home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / qbbs / ques_221.zip / SAMPLES.ZIP / DATABASE.ZIP / Q-NEW.Q-A < prev    next >
Text File  |  1991-04-07  |  160b  |  19 lines
  1. :FIRST
  2.  
  3. readansi 1
  4. if 1 = "on"
  5. start q-new1
  6. endif
  7. if 1 = "off"
  8. start q-new2
  9. endif
  10.  
  11.  
  12. :last
  13. delete q-new.asw
  14. quit
  15.  
  16. :abort
  17. delete q-new.asw
  18. quit
  19.